home *** CD-ROM | disk | FTP | other *** search
/ Software Vault: The Gold Collection / Software Vault - The Gold Collection (American Databankers) (1993).ISO / cdr47 / ucrasm27.zip / SOURCE.ZIP / MEMBER.ASM < prev    next >
Assembly Source File  |  1991-10-12  |  694b  |  40 lines
  1. StdGrp        group    stdlib,stddata
  2. stddata        segment    para public 'sldata'
  3. stddata        ends
  4. ;
  5. stdlib        segment    para public 'slcode'
  6.         assume    cs:stdgrp
  7. ;
  8. ;
  9. ; Member-    Checks to see if a character is in a set.
  10. ;
  11. ; inputs:
  12. ;
  13. ;    ES:DI-  Points at the set (at its mask byte).
  14. ;    AL-    Character to check.
  15. ;
  16. ; outputs:
  17. ;    zero flag is set if the character is not in the set.
  18. ;    zero flag is clear if the character is in the set.
  19. ;
  20. ;
  21.         public    sl_member
  22. ;
  23. sl_member    proc    far
  24.         push    ax
  25.         push    bx
  26. ;
  27.         mov    bl, al
  28.                 mov    bh, 0
  29.         mov    al, es:[di]        ;Get mask byte
  30.         test    al, es:8[di][bx]    ;See if char is in set.
  31. ;
  32.         pop    bx
  33.         pop    ax
  34.         ret
  35. sl_member    endp
  36. ;
  37. ;
  38. stdlib        ends
  39.         end
  40.